From: Dmitry Antipov Date: Fri, 18 Nov 2011 16:50:16 +0000 (-0500) Subject: * src/keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~1626 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=5082d84f96e5e26f6fb3f2d7f03c34738a058d91;p=emacs.git * src/keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs. --- diff --git a/src/ChangeLog b/src/ChangeLog index ee8842c4e22..798ef1d0a03 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2011-11-18 Dmitry Antipov + + * keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs. + 2011-11-18 Stefan Monnier * intervals.c: Fix grafting over the whole buffer (bug#10071). diff --git a/src/keymap.c b/src/keymap.c index 6f9cf288f6d..b429ca968d7 100644 --- a/src/keymap.c +++ b/src/keymap.c @@ -2624,11 +2624,11 @@ remapped command in the returned list. */) /* We have a list of advertised bindings. */ while (CONSP (tem)) if (EQ (shadow_lookup (keymaps, XCAR (tem), Qnil, 0), definition)) - return XCAR (tem); + RETURN_UNGCPRO (XCAR (tem)); else tem = XCDR (tem); if (EQ (shadow_lookup (keymaps, tem, Qnil, 0), definition)) - return tem; + RETURN_UNGCPRO (tem); } sequences = Freverse (where_is_internal (definition, keymaps,